/*
 * Copyright (c) 2014 pkzd/1.0, 颜文泽(robin)
 * All rights reserved.
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *
 *     1 Redistributions of source code must retain the above copyright
 *       notice, this list of conditions and the following disclaimer.
 *     2 Redistributions in binary form must reproduce the above copyright
 *       notice, this list of conditions and the following disclaimer in the
 *       documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS "AS IS" AND ANY
 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR ANY
 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

#include	"fs.h"
#include	<time.h>
#include	<fcntl.h>
#include	<stdio.h>
#include	<errno.h>
#include	<string.h>
#include	<stdlib.h>

static int add(char *device, char *dest, char *source, int mode);

int
main(int argc, char *argv[])
{
	if(argc < 5){
		fprintf(stderr, "Usage: ./add device dest source mode\n");
		exit(1);
	}
	return add(argv[1], argv[2], argv[3], atoi(argv[4]));
}

static int
add(char *device, char *dest, char *source, int mode)
{
	int n;
	int fd;
	int fd0;
	int ino;
	char buf[BLKSIZ];
	struct filsys spb;
	struct inode inode;

	if((fd0 = open(source, O_RDONLY)) == -1){
		close(fd);
		fprintf(stderr, "Error: cannot open file %s\n", source);
		return -1;
	}
	if((fd = open(device, O_RDWR)) == -1){
		fprintf(stderr, "Error: cannot open device %s: %s\n", device, strerror(errno));
		return -1;
	}
	if(bread(fd, NRSVSCT, &spb, 1)){
		close(fd);
		fprintf(stderr, "Error: cannot read superblock of %s\n", device);
		return -1;
	}
	if(spb.s_magic != FS_MAGIC){
		close(fd);
		fprintf(stderr, "Error: unknow file system of %s\n", device);
		return -1;
	}
	if(!(mode & S_IFREG)){
		close(fd);
		fprintf(stderr, "Error: only support regular file\n");
		return -1;
	}
	if(!(ino = namei(fd, &spb, dest, 1, 0))){
		close(fd);
		fprintf(stderr, "Error: cannot creat file %s\n", dest);
		return -1;
	}
	if(iread(fd, &spb, ino, &inode)){
		close(fd);
		fprintf(stderr, "Error: cannot read file %s\n", dest);
		return -1;
	}
	inode.i_nlink = 1;
	inode.i_mode = mode;
	inode.i_atime = inode.i_ctime = inode.i_mtime = time(NULL);
	while((n = read(fd0, buf, BLKSIZ)) > 0){
		if(ioadd(fd, &spb, ino, &inode, buf, n) != n)
			break;
	}
	iwrite(fd, &spb, ino, &inode);
	close(fd0);
	return close(fd);
}
